gen agg=0
 
replace agg=agg+1 if D10Q2A1==1 

replace agg=agg+1 if D11Q1a2 ==1
replace agg=agg+2 if D11Q1A3 ==1
 
replace agg=agg+1 if D11Q2a2 ==1
replace agg=agg+2 if D11Q2A3 ==1
 
replace agg=agg+1 if D11Q3A2 ==1
replace agg=agg+2 if D11Q3A3 ==1
 
replace agg=agg+2 if D11Q4A3 ==1
replace agg=agg+2 if D11Q4A4 ==1

replace agg=agg+2 if D11Q5A2 ==1
replace agg=agg+2 if D11Q5A3 ==1
replace agg=agg+2 if D11Q5A4 ==1
replace agg=agg+2 if D11Q5A5 ==1
replace agg=agg+2 if D11Q5A6 ==1
replace agg=agg+2 if D11Q5A7 ==1

replace agg=agg+1 if D12Q11a2 ==1
replace agg=agg+1 if D12Q11a3 ==1

replace agg=. if asestyp!=2

****************************************
gen implsv=0

replace implsv=implsv+1 if D10Q2A2 ==1

replace implsv=implsv+1 if D10Q4A3 ==1
replace implsv=implsv+2 if D10Q4A4 ==1

replace implsv=implsv+1 if D10Q5A2 ==1
replace implsv=implsv+1 if D10Q5A3 ==1


replace implsv=implsv+1 if D11Q1a2 ==1
replace implsv=implsv+2 if D11Q1A3 ==1

replace implsv=implsv+2 if D12Q6A1 ==1
replace implsv=implsv+1 if D12Q6a2 ==1

replace implsv=implsv+1 if D12Q8A1 ==1

replace implsv=implsv+1 if D12Q9A1 ==1

 
replace implsv=implsv+1 if D12Q10a2 ==1

replace implsv=. if asestyp!=2

************************************

gen attitude=0

replace attitude=attitude+1 if D10Q7A2 ==1
replace attitude=attitude+1 if D10Q7A3 ==1
replace attitude=attitude+2 if D10Q7A4 ==1
 
replace attitude=attitude+1 if D10Q8A3 ==1
replace attitude=attitude+2 if D10Q8A4 ==1

replace attitude=attitude+1 if D10Q9A2 ==1 
replace attitude=attitude+2 if D10Q9A3 ==1
replace attitude=attitude+2 if D10Q9A4 ==1

replace attitude=attitude+1 if D10Q10A2 ==1 
replace attitude=attitude+2 if D10Q10A3 ==1
replace attitude=attitude+2 if D10Q10A4 ==1

replace attitude=attitude+1 if D11Q3A2 ==1
replace attitude=attitude+2 if D11Q3A3 ==1
 
replace attitude=attitude+1 if D11Q4A3 ==1
replace attitude=attitude+2 if D11Q4A4 ==1

replace attitude=. if asestyp!=2

************************************

gen socskill=0

replace socskill=socskill+2 if D10Q6A1 ==1
replace socskill=socskill+1 if D10Q6A2 ==1

replace socskill=socskill+1 if D11Q2a1 ==1

replace socskill=socskill+1 if D12Q4a3 ==1
replace socskill=socskill+2 if D12Q4a4 ==1

replace socskill=socskill+1 if D12Q5a3 ==1
replace socskill=socskill+2 if D12Q5a4 ==1

replace socskill=. if asestyp!=2

*****************************
************************************
gen future=0

replace future=future+2 if D10Q3A1 ==1
replace future=future+1 if D10Q3A2 ==1

replace future=future+2 if D10Q11A1 ==1

replace future=future+1 if D12Q1a2 ==1
replace future=future+2 if D12Q1a3 ==1
replace future=future+3 if D12Q1A4 ==1

replace future=future+1 if D12Q2a2 ==1
replace future=future+2 if D12Q2a3 ==1
replace future=future+3 if D12Q2A4 ==1

replace future=. if asestyp!=2
*****************************

************************************
foreach x in agg attitude socskill future implsv{
egen `x'2=std(`x')
}


foreach x in agg attitude socskill future implsv{
gen `x'b=`x'*10
gen `x'r=round(`x'b)
drop `x'b
}


**********************************
****** Noncog index
**********************************
egen skills_r=std(d12r_scr)
egen att_r=std(d10r_scr)
egen agg_r=std(d11r_scr)
egen noncog_r=std(skills_r+att_r+agg_r)



